perm filename K.F4[NET,GUE] blob sn#003923 filedate 1972-11-03 generic text, type T, neo UTF8
00100	       DO 200 N=1,100
00200	
00300	      M=N**N
00400	 200    CONTINUE
00500	        STOP
00600	        END